home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1985 February / Ahoy_Magazine_85-02_1985_Double_L.d64 / sprite loader (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  358b  |  17 lines
  1. 1 rem=-=-=-=-=-=-=-=-=-=-=
  2. 2 rem=   sprite loader   =
  3. 3 rem=-=-=-=-=-=-=-=-=-=-=
  4. 10 input"load which sprite file";fl$
  5. 20 input"which memory block (192..199)";bk
  6. 30 mem=64*bk
  7. 40 open 8,8,8,"0:"+fl$+",s,r"
  8. 45 rem>> for tape, replace
  9. 46 rem>> line 40 with this:
  10. 47 rem>>   open 8,1,0,fl$
  11. 50 for n=1 to 63
  12. 60 input#8,ttl
  13. 70 print ttl,
  14. 80 poke mem,ttl : mem=mem+1
  15. 90 next n
  16. 100 close 8
  17.